home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ Power off on shutdown.xpl < prev    next >
Text File  |  2002-10-20  |  1KB  |  50 lines

  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH 1"="Startup/Shutdown\Shutdown\Windows NT/2K/XP\00) Shutdown Menu"
  5. "NAME"="Windows XP Power off on Shutdown"
  6. "OSVERSION"="0000011"
  7. "VERSION"="1.08"
  8. "LANGUAGE"="VBScript"
  9. "TEXT 1"="Power off Windows on shutdown."
  10. "DESCRIPTION 1"="This determines if your computer's power turns off once you shut it down or if it waits for you to manually switch off the power. For Windows XP and possibly Windows 2000."
  11. "DESCRIPTION 2"="If your system does not behave as you expect it to, you may need a system BIOS upgrade (usually not a high cost).  Some systems just may not work with this option, and others do."
  12. "DESCRIPTION 3"="Please note: This setting only affects the current user."
  13. "AUTHOR"="Xteq Systems (CptSiskoX)"
  14. "CONTACTURL"="http://www.xteq.com"
  15. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  16. "COMMENT 1"=" "
  17.  
  18.  
  19. sV1="HKCU\Control Panel\Desktop\PowerOffActive"
  20.  
  21.  
  22. Sub Plugin_Initialize 
  23.  i=RegReadValue(sV1)
  24.  if i=1 then SetUIElement 1,true
  25. End Sub
  26.  
  27. Sub Plugin_CheckData(ElementIndex)
  28. End Sub
  29.  
  30. Sub Plugin_Apply(ElementIndex,ElementSubIndex)
  31.  valToSet=0
  32.  
  33.  b=GetUIElement(1)
  34.  if b=true then
  35.     valToSet=1
  36.  else
  37.     valToSet=0
  38.  end if
  39.  
  40.  if GetWinVer=4 or GetWinVer=6 then
  41.     Call RegWriteValue(sv1,valToSet,1)
  42.  end if
  43.  
  44.  
  45.  Call Logoff()
  46. End Sub
  47.  
  48. Sub Plugin_Terminate 
  49. End Sub
  50.